home *** CD-ROM | disk | FTP | other *** search
/ Fritz: All Fritz / All Fritz.zip / All Fritz / FILES / PROGNG_C / DBTOOLC.LZH / SOURCE.ARC / PUTWINDO.C < prev    next >
Text File  |  1986-07-01  |  936b  |  37 lines
  1. putwindow(y1,x1,y2,x2,buffer, clear,type)
  2. int    y1,x1;    /* coordinates of upper left corner */
  3. int    y2,x2;    /* coordinates of lower right corner */
  4. int    *buffer; /* place to store previous screen contents */
  5. int    clear;    /* if non-zero, clear contents of window */
  6. int    type;    /* 0 if single border, else double border */
  7. {
  8. int    i;
  9.  
  10.     if (buffer != (char *) 0)    /* 0 means don't bother */
  11.         savwindo(y1,x1,y2,x2,buffer);
  12.     
  13.     if (clear)
  14.         for (i = 0; i <= y2-y1; i++)
  15.         {
  16.             curlocat(y1+i, x1);
  17.             wrtch((x2-x1),' ');
  18.         }
  19.     curlocat(y1,x1);
  20.     wrtch(x2-x1, type ? 205 : 196);
  21.     wrtch(1,type ? 201 : 218);
  22.     curlocat(y1,x2);
  23.     wrtch(1,type ? 187 : 191);
  24.     for (i = 0; i <= y2-y1-2; i++)
  25.     {
  26.         curlocat(y1+i+1,x1);
  27.         wrtch(1,type ? 186 : 179);
  28.         curlocat(y1+i+1,x2);
  29.         wrtch(1,type ? 186 : 179);
  30.     }
  31.     curlocat(y2,x1);
  32.     wrtch(x2-x1,type ? 205 : 196);
  33.     wrtch(1,type ? 200 : 192);
  34.     curlocat(y2,x2);
  35.     wrtch(1,type ? 188 : 217);
  36. }
  37.